home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 90 / CD Actual 90.iso / Software3D / VirtualLight / VLight1.3win32.exe / Examples / Level1 / ImplicitSHF.vib < prev    next >
Encoding:
Text File  |  2002-10-07  |  595 b   |  21 lines
  1. // VirtuaLight VIB-Structure
  2.  
  3. ReadArchive "defshaders.vs"
  4.  
  5. Camera [ (0,5,-8),(0,0,0),(0,1,0) FieldOfView 45 Format(320, 240) FrameAspectRatio 4/3 ]
  6.  
  7. Background '.098039, .098039, .392157'*0.9
  8.  
  9. PointLight [ (-50,50, -50) Intensity i ]
  10. PointLight [ (55,40, -40) Intensity i ]
  11. PointLight [ (-20,40, 55) Intensity i/4 LightingAttributes SPECULAR ]
  12.  
  13. static theta = u * TWO_PI
  14. static phi = (v - 0.5) * PI
  15.  
  16. Shape [
  17.  ImplicitSphericalHeightField(2.75, 1.5, (0.15 * cos(10 * phi) * cos(10 * theta)), 60, 60, SmoothNormal)
  18.  primitive
  19. ]
  20.  
  21. Shape [ Disk((0,-2.75,0), (0,1,0), 500) ground ]